RCAD script
1.00
drapeau
drapeauup.bmp
drapeaudown.bmp
1
0
1
Vertical/Horizontal









V









if UserInput1 = "V" then
    Add_Line(Firstx - 4, Firsty + 8, Firstx + 5, Firsty - 10, 0.25, 7, False, False, False, 100)
    Add_Line(Firstx + 4, Firsty + 8, Firstx - 5, Firsty - 10, 0.25, 7, False, False, False, 100)
    Add_Line(Firstx - 5, Firsty - 10, Firstx - 9, Firsty - 6, 0.25, 7, False, False, False, 100)
    Add_Line(Firstx - 9, Firsty - 6, Firstx - 3, Firsty - 6, 0.25, 7, False, False, False, 100)
    Add_Line(Firstx + 5, Firsty - 10, Firstx + 9, Firsty - 6, 0.25, 7, False, False, False, 100)
    Add_Line(Firstx + 9, Firsty - 6, Firstx + 3, Firsty - 6, 0.25, 7, False, False, False, 100)
else
    Add_Line(Firstx + 8, Firsty - 4, Firstx - 10, Firsty + 5, 0.25, 7, False, False, False, 100)
    Add_Line(Firstx + 8, Firsty + 4, Firstx - 10, Firsty - 5, 0.25, 7, False, False, False, 100)
    Add_Line(Firstx - 10, Firsty - 5, Firstx - 6, Firsty - 9, 0.25, 7, False, False, False, 100)
    Add_Line(Firstx - 6, Firsty - 9, Firstx - 6, Firsty - 3, 0.25, 7, False, False, False, 100)
    Add_Line(Firstx -10, Firsty + 5, Firstx - 6, Firsty + 9, 0.25, 7, False, False, False, 100)
    Add_Line(Firstx - 6, Firsty + 9, Firstx - 6, Firsty + 3, 0.25, 7, False, False, False, 100)
end if

